1) NXM.FAI[TMP,LCS] and 2) XM.FAI[TMP,LCS]	5-16-79 13:10	pages 1,1

**** File 1) NXM.FAI[TMP,LCS], Page 1 line 4
1)	C00003 00002	TITLE XM
1)	C00004 00003	BEG:	SETOM LINE
1)	C00009 00004	XINI:	SKIPN GO
1)	C00012 00005		MOVE A,E	ROTATION
1)	C00015 00006	XCHA:	SETZ 14,	↓↓MOVE UP AND RIGHT
1)	C00018 00007	MVLFT:	MOVMS 0		MOVE LEFT THEN RIGHT
1)	C00021 00008	OOBAR:	SETZM OOBFLG	 GET HERE IF ALL READY OOB
1)	C00025 00009	FINDL:	HRRZ A,JOBREL		CK IF BIG ENUF
1)	C00031 00010	INBITS:	PUSHJ P,NAMGET		INPUT OLD BIT FILE
1)	C00033 00011	CORUP
1)	C00035 00012	******** TYPE '4' FOR 4X4 DOTS, TYPE '9' FOR 9X9 DOTS.***********
1)	C00037 00013	GETNAM:	MOVEI A,		FILE SCAN
1)	C00039 00014	FILNAM:	0			GLOPS OF JUNK
1)	C00040 ENDMK
1)	C⊗;
**** File 2) XM.FAI[TMP,LCS], Page 1 line 4
2)	C00002 00002	TITLE XM
2)	C00003 00003	BEG:	SETOM LINE
2)	C00008 00004	XINI:	SKIPN GO
2)	C00011 00005		MOVE A,E	ROTATION
2)	C00014 00006	XCHA:	SETZ 14,	↓↓MOVE UP AND RIGHT
2)	C00017 00007	MVLFT:	MOVMS 0		MOVE LEFT THEN RIGHT
2)	C00020 00008	OOBAR:	SETZM OOBFLG	 GET HERE IF ALL READY OOB
2)	C00024 00009	FINDL:	HRRZ A,JOBREL		CK IF BIG ENUF
2)	C00028 00010	INBITS:	PUSHJ P,NAMGET		INPUT OLD BIT FILE
2)	C00030 00011	CORUP
2)	C00032 00012	FRD:	MOVSI A,'PLT'		FILE SCAN
2)	C00034 00013	GETNAM:	MOVEI A,		FILE SCAN
2)	C00036 00014	FILNAM:	0			GLOPS OF JUNK
2)	C00037 ENDMK
2)	C⊗;
***************


**** File 1) NXM.FAI[TMP,LCS], Page 3 line 61
1)		SETZM SPREAD#
1)	FILIN:	OUTSTR [ASCIZ /FILE? (DEFAULT=PLT.PLT) /]
**** File 2) XM.FAI[TMP,LCS], Page 3 line 61
2)	FILIN:	OUTSTR [ASCIZ /FILE? (DEFAULT=PLT.PLT) /]
***************


**** File 1) NXM.FAI[TMP,LCS], Page 3 line 81
1)	OUTSTR [ASCIZ/ORIGIN X RIGHT OFFSET RIGHT (DEFAULT=4(CENTER))?/]
1)		PUSHJ P,RNUM
**** File 2) XM.FAI[TMP,LCS], Page 3 line 80
2)	OUTSTR [ASCIZ/ORIGIN X OFFSET FROM RIGHT (DEFAULT=4)?/]
  1) NXM.FAI[TMP,LCS] and 2) XM.FAI[TMP,LCS]	5-16-79 13:10	pages 3,3

2)		PUSHJ P,RNUM
***************


**** File 1) NXM.FAI[TMP,LCS], Page 9 line 32
1)		SKIPN SPREAD
1)		JRST XGPOUT
1)		HRRZ T,XGPPTR
1)		ADDI T,LBUFL+1
1)		HRRZ C,SVBBB
1)		SKIPG SPREAD
1)		JRST NINE
1)	XLINE4:	HRLI T,-LBUFL
1)	XSHFT4:	MOVE A,2(T)
1)		MOVE B,3(T)
1)		ROTC A,1
1)		ORM A,2(T)
1)		AOBJN T,XSHFT4
1)		AOJ T,
1)		SOJG C,XLINE4
1)		HRRZ T,XGPPTR
1)		HRRZ B,SVBBB
1)		
1)	YLINE4:	HRLI T,-LBUFL
1)	YSHFT4:	MOVE A,LBUFL+3(T)
1)		ORM A,2(T)
1)		AOBJN T,YSHFT4
1)		AOJ T,		;Bump past control word.
1)		SOJG B,YLINE4
1)		JRST XGPOUT
1)	NINE:	HRLI T,-LBUFL
1)	XSHFT9:	MOVE A,2(T)
1)		MOVE B,3(T)
1)		ROTC A,1
1)		ORM A,2(T)
1)		ROTC A,1
1)		ORM A,2(T)
1)		AOBJN T,XSHFT9
1)		AOJ T,
1)		SOJG C,NINE
1)		HRRZ T,XGPPTR
1)		HRRZ B,SVBBB
1)	YLINE9:	HRLI T,-LBUFL
1)	YSHFT9:	MOVE A,LBUFL+LBUFL+4(T)
1)		OR A,LBUFL+3(T)
1)		ORM A,2(T)
1)		AOBJN T,YSHFT9
1)		AOJ T,
  1) NXM.FAI[TMP,LCS] and 2) XM.FAI[TMP,LCS]	5-16-79 13:10	pages 9,9

1)		SOJG B,YLINE9
1)	XGPOUT:	OPEN XGP,XNIT		;XGP OUTPUT
**** File 2) XM.FAI[TMP,LCS], Page 9 line 32
2)	XGPOUT:	OPEN XGP,XNIT		;XGP OUTPUT
***************


**** File 1) NXM.FAI[TMP,LCS], Page 12 line 1
1)	;******** TYPE '4' FOR 4X4 DOTS, TYPE '9' FOR 9X9 DOTS.***********
1)	FRD:	MOVSI A,'PLT'		;FILE SCAN
**** File 2) XM.FAI[TMP,LCS], Page 12 line 1
2)	FRD:	MOVSI A,'PLT'		;FILE SCAN
***************


**** File 1) NXM.FAI[TMP,LCS], Page 12 line 14
1)	;;GOX:	CAME A,[SIXBIT/:/]	;FOR * FOUR
1)	GOX:	CAME A,[SIXBIT/4/]	;FOR * FOUR
1)		JRST CKSEMI
1)		AOS SPREAD
1)	POPBAC:	POP P,A
1)		JRST FILIN
1)	CKSEMI:	CAME A,[SIXBIT/9/]		;FOR * NINE
1)	;;CKSEMI:	CAME A,[SIXBIT/;/]
1)		JRST CKDEFA
1)		SETOM SPREAD
1)		JRST POPBAC
1)	CKDEFA:	SKIPN A
1)	 	MOVE A,['PLT   ']
**** File 2) XM.FAI[TMP,LCS], Page 12 line 12
2)	GOX:	SKIPN A
2)	 	MOVE A,['PLT   ']
***************